set var1 [open "demo.txt" w]
puts $var1 "hello world"
close $var1
